DDDDDDDDDDDD «sé EEE EEEEEEEEEEEE LLL TITTITTTITITTTT | AAAAAAAAA 

DDDDDDDDDDDD =—ss«EEEEEEEEEEEEEEE LLL TITTITITITTTTTT | AAAAAAAAA 

DDDDDDDDDDDD ~—ss« EEEEEEEEEEEEEEE LLL TITTTTTTTTTTTTT §«——- AAAAAAAAA 

DDD pod EEE LLL TIT AAA AAA | 

DDD DDD EEE LLL TIT AAA AAA | 

DDD pop EEE LLL TIT AAA AAA | 

DDD DDD EE LLL TIT AAA AAA | 
D DDD EEE LLL TIT AAA AAA | 

DDD DDD EEE LLL TIT AAA AAA 

DDD DDD EEEEEEEEEEEE = LLL TIT AAA AAA 

DDD DDD EEEEEEEEEEEE = LLL TIT AAA AAA 

DDD DDD EEEEEEEEEEEE = LLL TIT AAA AAA 

DDD DDD EEE LLL TIT AAAAAAAAAAAAAAA | 

DDD DDD EEE LLL TIT AAAAAAAAAAAAAAA | 

DDD DDD EEE LLL TIT AAAAAAAAAAAAAAA 

DDD DDD EEE LLL TIT AAA AAA 

DDD DDD EEE LLL TIT AAA 

DDD DDD EEE LLL TIT AAA AAA 

DDDDDDDDDDDD ss: EEEEEEEEEEEEEEE LULLLLLLLLLLLLL TIT AAA AAA 

DDDDDDDDDDDD «=—s«EEEEEEEEEEEEEEE LLLLLULLLLLLLLL TIT AAA AAA 

DDDDDDDDDDDD«=—=s«EEEEEEEEEEEEEEE LULLLLLLLLLLLLL TIT AAA AAA 


f 


-—- 4 


#*F ILE** 1 DeexXDSTRING 

Kx XxX DDDDDODD SSSSSSSS TTTTTTTTTT RRRRRARRR IIIT] NN NN 66666666 
Kx KX DDDDDDDD SSSSSSSS TTTTTTTTTT RRRRRRRR 1111 NN NN 66666666 
Kx xx OD DD SS TT RR RR I] NN NN 6G 
Xx Kx =D DD SS TT RR RR I] NN NN GG 

KX OMX dd DD SS TT RR RR I] NNNN NN GG 

ax ORK oD dD SS TT RR RR I } NNNN NN GG 

Hn dD DD SSSSSS TT RRRRRARRR | NN NN NN GG 
Kx 0d dD SSSSSS TT RRRRRRRR I] NN NN NN GG 

KX OK dD dD $$ 1T RR RR I] NN NNNN GG 666666 

KX KK dD DD $$ TT RR RR I] NN NNNN GG 666666 
Kx Kx «OD dD $$ TT RR RR II NN NN GG GG eee 
Kx Kx OD dD $s TT RR RR I] NN NN GG GG eee 
ax XX DDDDDDDD SSSSSSSS TT RR RR III! NN NN GGGGGG eee 
BA XX DDDDDDDD SSSSSSSS TT RR RR HII NN NN GGGG6GG eee 
tL T1111! SSSSSSSS 
LL V1] $SSSSSSS 
LL I] $$ 
LL I! $$ 
LL I] $$ 
LL I] $$ 
LL I] SSSSSS 
LL I] SSSSSS 
tL I] $$ 
LL I] $s 
LL I] $$ 
tL I] $s 
LLLLELELLL 11111] SSSSSSSS 
CLLELELLLEL EES EE SSSSSSSS 


ne ee 


; 
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o8 3; Modified by: 
00 ; V02-003 LJK0030 Lawrence J. Kenah 10-Jun-1981 
00 3 Add second set of stored text strings to accomodate the 
38 g longword PFN arrays that result when more than 52 Mbytes 
3 of physical memory is present on the system. 
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Oe 000 DECLARA ions ° a pa obe 88; 8; iB YOELYA: SRC IXDSTRING.MAR; 1 
5 - SUBTITLE DECLARATIONS 
3 ; Equated Symbols: 
40 ° CR=*01 
4 LF=*01 
4 
45 ; 
rf: ; Own Storage: 
4 ’ -PSECT ZS$DEBUGXDSTR,BYTE 


soins db 
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- SUBTITLE Stored commands for word PFN arrays 


This first set of stored commands 9s umes that the PFN data base i 
arrays ¢ conte n yor? elements. Ths initial contents of both XE and xf 
cause th %$ initialization sequence to take place. 


s 
] 
D 
D 
4 i) 
5 XDSSGT_WORD_PFN:: ) 
4 4C 58 § ASCII <cR>*C “<CR> D 
C F § ASCII angle. x*<CR> sSET X REGISTERS 6 THROUGH D D 
C 51 oF D 8 eASCIT = *X7/0,73X*<CR> D 
3 C 51 2F 8 6 eASCIIL *X8/0,8;X°<CR> D 
C 51 2F 1F $9 eASCIIL *X9/0,9;X*<CR> 1 
41 5 } F 41 : ASCII “XA/Q,A;X°<CR> L 
OD 4c 5B 5 4 6 SASCIL §6*xE+7OCU'TL*<CR> CR, LF L 
42 2C 51 2F 4 f 6 eASCIIL *XB/Q,B8;xX*<CR> L 
45 2C 51 2F 4 64 eASCIL “*xXC/Q,C3xX*<CR> L 
44 2C 51 2F 44 $f 6g SASCII §=6*XD/Q.0:X*<CR> | . 
$7 ee ; See ASSUME macros at bottom of page for meaning of hard coded constants t 
OD 58 45 2C 46 B 51 30 45 57 9 : eASCII “KXE=Q¢B8F ,E;X*°<CR> 3XE PRINTS PFN DATA BASE FOR PFN IN XO 
OD 58 Hy 46 $f 41 3 38 1 ? 46 38 63 $ ASCII “XF=Q¢7A,F Fsx*<CR> 3XF PRINTS PFN DATA BASE FOR PFN IN RO L 
00 of 4 BYTE 0 ; TERMINATOR FOR INITIAL LOAD OF XE AND XF t 
| 
7 7 MOSSCALFRSG: 0 
OA OD 7 74 -BYTE CR,LF 0 
7 75 XDSSPFNMSG: P 
41 54 41 464 4E 46 50 20 ve 4 eASCII “* PFNDATA* : 
7A 78 XDSSPFNRO: S 
7A 7 -BYTE CR S 
OD 4C sf 38 ge 37 D $8 4 0 ASCII ys sr CRLF $ 
58 8 3 1 ASCII “ROCW/Q,0* <*xX3B> “X* ;DISPLAY PFN, SET x0 $ 
f : KDSSPFNKO: ” : 
4C 5B 32 2B 2€ 22 57 38 $} 32 ee 4 ASCII “XPeACW''.#20L°'. 44° sCRLF ‘'PFN DATA’ 2 
A 5 BYTE 
3 8 57 Ag $ ASCII “CwWwxO0=* sDISPLAY PFN | S 
F 42 5B 4 A ASCII eens erase sDISPLAY STATE S 
fF 36 44 AF 8 eASCII *x0+xDLB/* 4b re PE S 
2F 57 58 3 A 087 eASCIIL “*XO#24+x9CW/* sDISPL F COUNT S 
F 4 A C1 0 eASCIL “*X0*#2¢xB/* :DISPLAY INK/WS $ 
fF A C9 4! att3i| “x0e state sDISPLAY FLINK/SHRCNT $ 
27 4C 58 A D1 § eASCIIL *xX004+xX70L/* DISPLAY PTE POIN s 
F 38 A ° qi ASCII] *X004+x8/* sDISPLAY BACKUP ADDRESS W 
* 57 58 : A 94 ASCII “*xXO02+x6CU/* sDISPLAY SWAP VBN 
° XFeALWLL*<CR> NAL L L RD D LAY 
ac 58 B 41 20 46 ASCII : FeACW'EL*<CR> FINAL CRLF, SET ONGWORD DISP 
; The difference between the initial and worting goncents of both XE and 
1 ? ; MF must be hard coded into ASCII serings. | ne A Sone macros here make 
1 3 gure that these strings are prpoerly in : ialized the event that text 
1 § 3: is added to cause these differences to change. A third assumption, the 
' ? ; location of the CRLF string, is also checked with the ASSUME macro. 


E acsosehitenieetcncinllth aii ieatoieceslagi settled iipaaiaeatee deg tininiapsaidte epidaanioated eaetnpidanaabeaaadeiea tae 


ay 
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F 105 ASS 

f ASS 

F 1 § ASSUME <XDSSCRLFMSG = XDS$GT_WORD_PFN> EQ <*x70> 
F 1 ASSUME <XDSSPFNRO = XDSSCRLFASG> EQ <*x0A> 


L 9 
T orreys "97 $6E=1 383 83:68:28 f 
UME <HDSSPENXO = XDS$GT_WORD_PEN> EQ 
UME <XDSSPFNRO = XDSSGT-WORD-PFN> EQ 
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<*X8F> ; Stored string for XE 
<*X7A> ; Stored string for XxF 


4 
(1) 
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for lonquord PFN arrays 3-8 sats vi 83:68:28 YOELTA SRE XDSTRING.MAR; 1 
» SUBTITLE Stored commands for longword PFN arrays 


This second set of stored commands is identical to the first except for 
those d setae that cefiect lLongword (instead of word) PFN sizes. All 
characters that are different are reflegtes n the comments. INIT detects 
he longword PFN arrays and alters the initial contents of XE and XF to 
this alternate set of stored commands. 


°o 
<3 


re Page > 


3K“<CR> SET X REGISTERS 6 THROUGH D 


/0°A:K*<CR> 
“xe +70CU'CL“<CR> CR, LF 
“¥B/Q,8;x*<CR> 


DWOOMOOOrOMOOoo 
>>>>>? YP 


PRINTS PFN DATA BASE FOR PFN IN 
PRINTS PFN DATA BASE FOR PFN IN 
MINATOR FOR INITIAL LOAD OF XE 


a at SW J SS a 
WARPONOFOPOFUNONNPE & 
Ft ot at ot ot ot ea et 


ANF WI OONOD 


A 
A 
Mh 
A 


COVA MMMM 
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BYTE 


XDSSCRLFMSG_LONG: 
BYTE  CR.LF | 
XDSSPFNMSG_LONG: | 
ASCII * PFNDATA* 


XDSSPFNRO_LONG: 
YTE 


. CR 
eASCII = “XF-ACW''EL“<CR> Hs 
“ROCL/Q,0* <*X3B> *x* ;D 


41 54 41 44 4E 46 50 20 


OD 4C 2 57 SB 41 2D 4 33 LF 
58 38 0 5 51 2F 4C 3 0 SPLAY PFN, SET xO (* CL *) 


ASCII 
XDSSPFNXO LONG: ‘a | 
4C 58 32 2B 2€ 22 57 58 41 30 46 b SASCIL = “XFeACW''.#2CL''.44" CRLF PEN DATA’ 
22 34 2B 2E 
D -BYTE CR | 
32 8 4 SASCIL «= “CLXO=* sDISPLAY PFN (* CL ®) | 
F 42 5B 4 8 eASCIL XxX +xCEB/ SDISPLAY STATE 
fF 4 44 SASCIL §=*X0#XD BY [DISPLAY TYPE 
f 57 58 3 A eASCIL =X seek w/e [DISPLAY REF COUNT | 
4C 58 rt 4 2A eASCIL *x004+xB \/* sDISPLAY BLINK/WSLX (* times 4 , CL added *) 
F 4 4 OA SASCIT § *X084+KA/ SDISPLAY FLINK/SHRCNT (* times 4 ©) | 
f 37 4 2A ASCII “x004+X7/* [DISPLAY PTE POINTER (* CL eliminated *) 
t 38 4 2A SASCIL §=*x004¢x8/* [DISPLAY BACKUP ADDRESS 
3 57 58 $ é A SASCII * *exghu/s “DISPLAY SWAP V 
4c 58 B41 2p 4 ASCII ok ACW L*°<CR> ;FINAL CRLF, SET LONGWORD DISPLAY 


The difference between the initial and working contents of both XE and 
XF must be hard coded into ASCII strings. the ASSURE macros here make 
ure that these strings are prpoerly initialized in the event that text 
s added to cause these qisterences to change. A third assumption, the 
location of the CRLF string, is also checked with the assume macro. 


ASSUME <XDSSPFNXO_LONG = XDSSGT_LONG_PFN> EQ <*X8F> ; Stored string for KE 
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ASSUME <XDSSPFNRO_LONG = XDSSGT_LONG_PFN> EQ <*X7A> ; Stored string for XxF 


ASSUME <XDSSCRLFMSG_LONG = XDSSGT_LONG_PFN> EQ <*x70> 
ASSUME <XDSSPFNRO_LONG = XDSSCRLFASG_LONG> EQ <*x0A> 


--- 
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Symbol table . rants} 83:08:08 YOELYA SRE XDSTRING.MAR; 1 mae (1). 
1 = QA 
= A 
LOSSCR FMSG R 1 
RDSSCRLE RSG LONG 68 R 1 
DS$GT_LONG_ “PFN FB RG 1 
xD beset" WORD_ “PFN 9 RG 1 
KDSSPFAM R 1 
XDSSPFNMSG_LONG - R 1 
XDSSPFN NRO O7A R 1 
XDSSPFNRO_LONG 172 R 1 
XDSSPF NX + R 1 
XDSSPFNXO_LONG 0000187 R 1 
maw woman oe masa & 
! Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes | 
. ABS, 00000000 ¢ 0.) 00 ¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE | 
ZSDEBUGXDSTR Q00001FO ¢ 496.) O1¢ 1.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC BYTE 
juneuesnsunensseeseasenest 
! ; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization $3 00: 0:00 -0? 00:00:00.47 
Command processing 130 00:00:00.34 00: B07 83 
Pass 110 00:00:00.53 0:00:04.52 
Symbol table sort 0 00:00:00.00 0:00:00.01 
ass 2 4 Bon! 0.28 0:00:01.12 
Symbol table output 0:00:00.01 B8?80 708-01 
Psect synopsis output SS 3 00:00:00.02 
Cross-reference output :00: 9-8 00:00:00.00 
Assembler run totals 33 00:00:01.21 00:00:08.04 


339 working get Limit was 1050 pages. 

379 bytes (7 pages) of virtual memory were used to buffer the intermediate co 

178"s were ? pages of symbol table space ad oat i to hold 12 non-local and 8° Torel symbols. 
source Lines were read in Pass 1, produc ing 12 object records in Pass 2. 


1 page of BB memory was used to "detine 1 macro. 


RESneoaensenra nan aaonannannaam } 


Macro Library name 
~$255$DUA28: SYS.OBJJLIB.MLB;1 0 
S$DUA s¥SL18 STARLET. ALB;2 1 
TotArs (all Libraries) 1 


6 GETS were required to define 1 macros. 


There were no errors, warnings or information messages. 
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MACRO/LIS=L1SS$:XDSTRING/OBJ=OBJ$:XDSTRING MSRCS$:XDSTRING/UPDATE=(ENHS: XDSTRING) *EXECMLS/LIB 
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